home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / PRG / ICProgKit 1.3.sit / ICProgKit1.3 / APIs / ICTypes.p < prev    next >
Text File  |  1996-07-14  |  2KB  |  76 lines
  1. unit ICTypes;
  2.  
  3. (* ･･･Start Header･･･ *)
  4.  
  5. (* File:         ICTypes.p
  6.  * Generated by: 1.0d4
  7.  * For:          IC 1.3
  8.  * On:           Sunday, 14 July 1996, 20:19:55
  9.  * 
  10.  * This file is part of the Internet Configuration system and
  11.  * is placed in the public domain for the benefit of all.
  12.  *)
  13.  
  14. (* ･･･End Header･･･ *)
  15.  
  16. interface
  17.  
  18. {$ifc undefined THINK_Pascal}
  19.     uses
  20.         Types;
  21. {$endc}
  22.  
  23. {$PUSH}
  24. {$ALIGN MAC68K}
  25.  
  26.     const
  27.         icPrefNotFoundErr = -666;            (* preference not found (duh!) *)
  28.         icPermErr = -667;                        (* cannot set preference *)
  29.         icPrefDataErr = -668;                    (* problem with preference data *)
  30.         icInternalErr = -669;                    (* hmm, this is not good *)
  31.         icTruncatedErr = -670;                    (* more data was present than was returned *)
  32.         icNoMoreWritersErr = -671;            (* you cannot begin a write session because someone else is already doing it *)
  33.         icNothingToOverrideErr = -672;    (* no component for the override component to capture *)
  34.         icNoURLErr = -673;                        (* no URL found *)
  35.         icConfigNotFoundErr = -674;            (* no configuration was found *)
  36.         icConfigInappropriateErr = -675;    (* incorrect manufacturer code *)
  37.  
  38.     const
  39.         ICattr_no_change = -1;    (* supply this to ICSetPref to tell it not to change the attributes *)
  40.  
  41.         ICattr_locked_bit = 0;                                        (* bits in the preference attributes *)
  42.         ICattr_locked_mask = $00000001;                    (* masks for the above *)
  43.         ICattr_volatile_bit = 1;
  44.         ICattr_volatile_mask = $00000002;
  45.  
  46.         icNoUserInteraction_bit = 0;
  47.         icNoUserInteraction_mask = $00000001;
  48.  
  49.         ICfiletype = 'ICAp';
  50.         ICcreator = 'ICAp';
  51.         ICdefault_file_name = 'Internet Preferences';    (* default file name, for internal use, overridden by a component resource *)
  52.     type
  53.         ICDirSpec = record                                            (* a record that specifies a folder *)
  54.                 vRefNum: integer;
  55.                 dirID: longint;
  56.             end;
  57.         ICDirSpecArray = array[0..3] of ICDirSpec;    (* an array of the above *)
  58.         ICDirSpecArrayPtr = ^ICDirSpecArray;                (* a pointer to that array *)
  59.         ICAttr = longint;                                                (* type for preference attributes *)
  60.         ICError = longint;                                                (* type for error codes *)
  61.         ICInstance = Ptr;                                                (* opaque type for preference reference *)
  62.         ICPerm = (icNoPerm, icReadOnlyPerm, icReadWritePerm);
  63.         ICConfigRef = record
  64.                 manufacturer: OSType;
  65.                 (* other private data follows *)
  66.             end;
  67.         ICConfigRefPtr = ^ICConfigRef;
  68.         ICConfigRefHandle = ^ICConfigRefPtr;
  69.  
  70. {$ALIGN RESET}
  71. {$POP}
  72.  
  73. implementation
  74.  
  75. end. (* ICTypes *)
  76.